﻿' Name class
'
' This class provides get and set methods for first, middle
' and last names.
'
' By Taji Abdullah 6/30/08

Public Class Name
    ' Class variables
    Private f_Name As String    ' First name
    Private m_Name As String    ' Middle name
    Private l_Name As String    ' Last name

    ' Constructor
    Public Sub New()

    End Sub

    ' FirstName get and set methods.
    Public Property FirstName() As String
        Get
            Return f_Name
        End Get
        Set(ByVal value As String)
            f_Name = value
        End Set
    End Property

    ' MiddleName get and set methods.
    Public Property MiddleName() As String
        Get
            Return m_Name
        End Get
        Set(ByVal value As String)
            m_Name = value
        End Set
    End Property

    ' LastName get and set methods.
    Public Property LastName() As String
        Get
            Return l_Name
        End Get
        Set(ByVal value As String)
            l_Name = value
        End Set
    End Property

End Class
